(:
	add anchors to a display file that doesn't have any
 :)

import module namespace
    jj = "http://kumquat.emse.fr/utilitaires"
    at "jjutils.xq" ;
<display>{
let $t := $arguments[1]
for $it in doc($arguments[1])/display/item
return
<item>{
	<info name="src-anchor"> {
		<anchor>{
        <doc>{ $t }</doc>,
        <path>{jj:build-Path($it)}</path>
      }</anchor>
	}</info>,
  for $in in $it/info
  return
        $in
}</item>
}</display>